home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1990: Night of the Living Disc / Night of the Living Disc.hdv / Dev.CD.5 / Tools / DTS.Samples / SC24Teach / Teach.p / UMenu.p < prev    next >
Encoding:
Text File  |  1990-05-25  |  913 b   |  55 lines  |  [04] ASCII Text (0x0000)
  1. {**********************************************************************
  2. {*
  3. {* Teach uMenu -- Version 3.0  (interface)
  4. {*
  5. {* Copyright (c)
  6. {* Apple Computer, Inc.  1986-1988
  7. {* All Rights Reserved.
  8. {*
  9. {* Developer Technical Support Apple II Sample Code
  10. {*
  11. {* This file contains the interface to the code which implements 
  12. {* menus in the Teach program.
  13. {*
  14. {**********************************************************************}
  15.  
  16. UNIT uMenu;
  17.  
  18. INTERFACE
  19.  
  20. USES
  21.        types,
  22.        locator,
  23.        quickdraw,
  24.        fonts,
  25.        INTMATH,
  26.        events,
  27.        controls,
  28.        windows,
  29.        dialogs,
  30.        menus,
  31.        desk,
  32.        STDFILE,
  33.        GSOS,
  34.        Resources,
  35.        TextEdit,
  36.        memory,
  37.        
  38.        uGlobals,
  39.        uUtils,
  40.        uWindow;
  41.  
  42.  
  43. procedure doMenu;      {Execute a menu item}
  44. procedure setUpMenus;  {Install menus and redraw menu bar}
  45.  
  46.  
  47.  
  48.  
  49.  
  50. IMPLEMENTATION
  51.  
  52. {$i uMenu.inc.p }
  53.  
  54. END.
  55.